home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 43
/
Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso
/
-serious-
/
graphics
/
fxforge
/
pinwheel d
< prev
next >
Wrap
Text File
|
1999-06-15
|
779b
|
26 lines
Category: Filter Factory Gallery L
Title: Pinwheel D...
Author: Greg Schorno
Copyright: Copyright © Greg Schorno
ctl[0]: Spokes 1
ctl[1]: Spokes 2
ctl[2]: Operation
ctl[3]: Twist 1
ctl[4]: Twist 2
ctl[5]: Red
ctl[6]:Green
ctl[7]: Blue
val[0]: 191
val[1]: 169
val[2]: 149
val[3]: 197
val[4]: 163
val[5]: 128
val[6]: 128
val[7]: 137
R:put((d+m*val(3,-8,8))*val(0,1,24)%D,0),put((sin(get(0))+512)/4,0),put((d+m*val(4,-8,8))*val(1,1,24)%D,1),put((sin(get(1))+512)/4,1),scl(ctl(5),64,192,ctl(2)&128?min(get(0),get(1)):get(0)-get(1),ctl(2)&16?max(get(0),get(1)):get(1)-get(0))
G:ctl(2)&64?scl(ctl(6),64,192,min(get(0),get(1)),max(get(0),get(1))):ctl(6)*abs(get(0)-get(1))/128
B:ctl(2)&32?scl(ctl(7),64,192,min(get(0),get(1)),max(get(0),get(1))):ctl(7)*abs(get(0)-get(1))/128
A:a